object frmFicheiroMovimentos: TfrmFicheiroMovimentos Left = 277 Top = 106 BorderStyle = bsNone Caption = 'frmFicheiroMovimentos' ClientHeight = 486 ClientWidth = 752 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 752 Height = 486 Align = alClient Picture.Data = {} Stretch = True end object Label1: TLabel Left = 8 Top = 8 Width = 378 Height = 29 Caption = 'Ficheiro de Movimentos (MEPS)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label13: TLabel Left = 45 Top = 54 Width = 665 Height = 41 Alignment = taCenter AutoSize = False Caption = 'Este � o resultado da leitura do Ficheiro de Movimentos. Poder� ' + 'ser feita uma an�lise da informa��o adquirida.'#13#10'Dever� fazer ��T' + 'erminar�� para finalizar a importa��o do Ficheiro de Movimentos ' + '(MEPS) e liquidar os documentos referentes ou ��Cancelar�� se de' + 'sejar abortar o processo."' Transparent = True WordWrap = True end object Label5: TLabel Left = 40 Top = 454 Width = 152 Height = 13 Anchors = [akLeft, akBottom] Caption = 'Pedir dados do pagamento' Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Transparent = True end object RxSpeedButton1: TRxSpeedButton Left = 650 Top = 450 Width = 75 Height = 25 Caption = 'Terminar' Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} Layout = blGlyphLeft NumGlyphs = 2 Transparent = True OnClick = RxSpeedButton1Click end object RxSpeedButton2: TRxSpeedButton Left = 550 Top = 450 Width = 75 Height = 25 Caption = 'Cancelar' Flat = True Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033338833333333333333333F333333333333 0000333911833333983333333388F333333F3333000033391118333911833333 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333 911118111118333338F3338F833338F3000033333911111111833333338F3338 3333F8330000333333911111183333333338F333333F83330000333333311111 8333333333338F3333383333000033333339111183333333333338F333833333 00003333339111118333333333333833338F3333000033333911181118333333 33338333338F333300003333911183911183333333383338F338F33300003333 9118333911183333338F33838F338F33000033333913333391113333338FF833 38F338F300003333333333333919333333388333338FFF830000333333333333 3333333333333333333888330000333333333333333333333333333333333333 0000} Layout = blGlyphLeft NumGlyphs = 2 Transparent = True OnClick = RxSpeedButton2Click end object RxSpeedButton3: TRxSpeedButton Left = 450 Top = 450 Width = 75 Height = 25 DropDownMenu = RxPopupMenu1 Caption = 'Imprimir' Flat = True Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 1800000000000003000000000000000000000000000000000000FFFFFFFFFFFF FFFFFFFFFFFFFFFFFF000000404040000000FFFFFFFFFFFF000000FFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000040404050505040 4040000000303030C0C0C0303030FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFF000000404040909090A0A0A0606060404040808080606060C0C0C03030 30FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000505050909090A0A0A0A0A0A080 8080606060404040808080B0B0B0909090303030FFFFFFFFFFFFFFFFFFFFFFFF 000000909090A0A0A0CFCFCFCFCFCF808080808080606060606060404040B0B0 B0303030FFFFFFFFFFFFFFFFFFFFFFFF606060A0A0A0CFCFCFCFCFCFC0C0C0CF CFCF808080808080606060606060202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 606060CFCFCFCFCFCFC0C0C0C0C0C0C0C0C0CFCFCF8080808080806060600000 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6FCFCFCFC0C0C0A06060C0C0C0C0 C0C0C0C0C0CFCFCF808080808080606060000000FFFFFFFFFFFFFFFFFFFFFFFF 3F3F3FCFCFCFA06060C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CFCFCF8080808080 80000000FFFFFFFFFFFFFFFFFF3030306F6F6F7F7F7FCFCFCFC0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0CFCFCF808080000000FFFFFFFFFFFF0000006F6F6F FFFFFFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0AFAF AF000000FFFFFFFFFFFF3F3F3FFFFFFFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0 C0C0C0C0C0C0C0C0C0C0C0B0B0B0202020FFFFFFFFFFFFFFFFFF000000BFBFBF FFBFBFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0B0B0B0202020FFFF FFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFFFBFBFFFBFBFFFFFFF6F6F6F3F 3F3FCFCFCFB0B0B0202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 000000BFBFBFFFFFFF6F6F6F303030FFFFFF3F3F3F202020FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000003F3F3F000000FFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} Layout = blGlyphLeft Transparent = True end object Panel3: TPanel Left = 2 Top = 115 Width = 745 Height = 330 BevelInner = bvLowered Color = clWhite TabOrder = 0 object Label2: TLabel Left = 10 Top = 10 Width = 42 Height = 13 Caption = 'Header' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 10 Top = 75 Width = 45 Height = 13 Caption = 'Detalhe' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 10 Top = 265 Width = 37 Height = 13 Caption = 'Trailer' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object RxDBGrid2: TRxDBGrid Left = 10 Top = 25 Width = 730 Height = 40 Color = clWhite DataSource = dsHeader FixedColor = 13551795 Options = [dgTitles, dgColumnResize, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Alignment = taCenter Expanded = False FieldName = 'A001' Title.Alignment = taCenter Width = 32 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A002' Title.Alignment = taCenter Width = 45 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A003' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A004' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A005' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A007' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A033' Title.Alignment = taCenter Width = 35 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A006' Title.Alignment = taCenter Width = 32 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A031' Title.Alignment = taCenter Width = 32 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A025' Title.Alignment = taCenter Width = 32 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'Filler' Title.Alignment = taCenter Visible = True end> end object RxDBGrid3: TRxDBGrid Left = 10 Top = 90 Width = 730 Height = 165 Color = clWhite DataSource = dsDetalhe FixedColor = 13551795 Options = [dgTitles, dgColumnResize, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Alignment = taCenter Expanded = False FieldName = 'A001' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A009' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A008' Title.Alignment = taCenter Width = 32 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A014' Title.Alignment = taCenter Width = 57 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A035' Title.Alignment = taCenter Width = 82 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A011' Title.Alignment = taCenter Width = 76 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A032' Title.Alignment = taCenter Width = 36 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A015' Title.Alignment = taCenter Width = 37 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A016' Title.Alignment = taCenter Width = 78 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A017' Title.Alignment = taCenter Width = 50 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A030' Title.Alignment = taCenter Width = 114 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A034' Title.Alignment = taCenter Width = 79 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A010' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A012' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A013' Title.Alignment = taCenter Visible = True end item Alignment = taCenter Expanded = False FieldName = 'Filler' Title.Alignment = taCenter Visible = True end> end object RxDBGrid4: TRxDBGrid Left = 10 Top = 280 Width = 730 Height = 40 Color = clWhite DataSource = dsTrailer FixedColor = 13551795 Options = [dgTitles, dgColumnResize, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Alignment = taCenter Expanded = False FieldName = 'A001' Title.Alignment = taCenter Width = 40 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A024' Title.Alignment = taCenter Width = 55 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A026' Title.Alignment = taCenter Width = 110 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A027' Title.Alignment = taCenter Width = 80 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'A023' Title.Alignment = taCenter Width = 80 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'Filler' Title.Alignment = taCenter Width = 340 Visible = True end> end end object RichEdit1: TRichEdit Left = 12 Top = 475 Width = 729 Height = 305 Lines.Strings = ( '') TabOrder = 1 Visible = False end object CheckBox1: TCheckBox Left = 15 Top = 454 Width = 13 Height = 15 Anchors = [akLeft, akBottom] TabOrder = 2 end object MemHeader: TMemoryTable Left = 482 Top = 10 object MemHeaderA001: TStringField FieldName = 'A001' Size = 1 end object MemHeaderA002: TStringField FieldName = 'A002' Size = 4 end object MemHeaderA003: TStringField FieldName = 'A003' Size = 8 end object MemHeaderA004: TStringField FieldName = 'A004' Size = 8 end object MemHeaderA005: TStringField FieldName = 'A005' Size = 9 end object MemHeaderA007: TStringField FieldName = 'A007' Size = 9 end object MemHeaderA033: TStringField FieldName = 'A033' Size = 5 end object MemHeaderA006: TStringField FieldName = 'A006' Size = 3 end object MemHeaderA031: TStringField FieldName = 'A031' Size = 2 end object MemHeaderA025: TStringField FieldName = 'A025' Size = 4 end object MemHeaderFiller: TStringField FieldName = 'Filler' Size = 47 end end object dsHeader: TDataSource DataSet = MemHeader Left = 516 Top = 6 end object MemDetalhe: TMemoryTable Left = 548 Top = 6 object MemDetalheA001: TStringField FieldName = 'A001' Size = 1 end object MemDetalheA009: TStringField FieldName = 'A009' Size = 2 end object MemDetalheA008: TStringField FieldName = 'A008' Size = 4 end object MemDetalheA014: TStringField FieldName = 'A014' Size = 8 end object MemDetalheA035: TStringField FieldName = 'A035' Size = 12 end object MemDetalheA011: TStringField FieldName = 'A011' Size = 10 end object MemDetalheA032: TStringField FieldName = 'A032' Size = 5 end object MemDetalheA015: TStringField FieldName = 'A015' Size = 2 end object MemDetalheA016: TStringField FieldName = 'A016' Size = 10 end object MemDetalheA017: TStringField FieldName = 'A017' Size = 5 end object MemDetalheA030: TStringField FieldName = 'A030' Size = 15 end object MemDetalheA034: TStringField FieldName = 'A034' Size = 9 end object MemDetalheA010: TStringField FieldName = 'A010' Size = 1 end object MemDetalheA012: TStringField FieldName = 'A012' Size = 1 end object MemDetalheA013: TStringField FieldName = 'A013' Size = 12 end object MemDetalheFiller: TStringField FieldName = 'Filler' Size = 3 end end object dsDetalhe: TDataSource DataSet = MemDetalhe Left = 580 Top = 6 end object MemTrailer: TMemoryTable Left = 612 Top = 6 object MemTrailerA001: TStringField FieldName = 'A001' Size = 1 end object MemTrailerA024: TStringField FieldName = 'A024' Size = 8 end object MemTrailerA026: TStringField FieldName = 'A026' Size = 17 end object MemTrailerA027: TStringField FieldName = 'A027' Size = 12 end object MemTrailerA023: TStringField FieldName = 'A023' Size = 12 end object MemTrailerFiller: TStringField FieldName = 'Filler' Size = 50 end end object dsTrailer: TDataSource DataSet = MemTrailer Left = 644 Top = 6 end object OpenDialog1: TOpenDialog Left = 680 Top = 8 end object tRecibos: TTable DatabaseName = 'Database1' TableName = 'Recibos.DB' Left = 712 Top = 48 end object tCondominios: TTable Left = 680 Top = 56 end object RxPopupMenu1: TRxPopupMenu Left = 640 Top = 80 object FicheiroImportado1: TMenuItem Caption = 'Ficheiro Importado' OnClick = FicheiroImportado1Click end object FicheiroAnalisado1: TMenuItem Caption = 'Ficheiro Analisado' OnClick = FicheiroAnalisado1Click end end end